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Sume PDFS LISP users have felt s need fur a way to incorporate 
MIMS sufereuLicT.es into LISP, LISP has been changed LO Let yOu do this* 
using files feu-ad On the LISP SYSTEM microtape, 

1. ASSEMBLING 

You write s routine for LISP in much the same way that yuu write 
?ny other MIMS relocatable aubroutine. You must, however* observe the 
constraints imposed by LISP r b a IL or a t i on and uae of accumulators „ and 
its method of handling input,, output, and interrupts. En addition, you 
rfqvire linkage to LISP before your routine can operate properly: The 
entry pofnt(s) of the subroutine must fee put on the property list (s) of 
the appropriate atota(a) t and the address fields of instructions pointing 
to o the if routines 3 to list structure * or the otlicr LISP data structures 
must he sot properly. This is done when LISP begins operation -- after 
allocation* but before going into it? listen loop. 

We provide eight macros to O-asO the job of creating such linkages: 
SUE It ? FETTER, LSUBR, MACRO, QUOTE, E, SPECIAL, and SW. 

If you write "EUBR UamO 1 ’ at a location ^ fn your routine, LISP will 
subsequently ascribe the- property BUBR 10 the atom ni'~ , with entry 
lMstion £, Similar remarks apply to the use of TRUER, L5UBR, and MACRO r 

The significance and use of the other four macros is perhaps best 
ccwtfiunicatcd through examples: 

1) An instruction like "MOVEI A *QUOTK (X Y Z)" will be assembled 
as "HOFEI A,O' 1 , At link time, however* USE* will insert tbs location 
of the list (X Y Z) into the address field of the instruction, 

7) Suppose that the at cm pOO has the properties shown in Figure 1. 
Then the instructions "MOVEI A*QU0TE TOO" , "MOVEM ESPECIAL FOO" , 

"PU&HJ P,EYM F00", and "CALL E POO" will each be assembled with a t&ro 
address field, which will be modified at link time to be fe, 106„ and 

10L, respectlively- 
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Figure I 


You should note that: 

1) Of these macros, only QuCrfE may be used with a nonatotaie 
argument. 

2) F can only be used with s routine which is knonm as a SFBJi to 
LI5F at link tine. 

3) SPFCIAL tiU Cause a value cell to be created foe tEte atom 
inflated, if it do** not already have one, 

4) If your routine must da I/O in a nore intimate manner than 
merely Gal Hog other subroutines such as p rint > re ^d . or uwite . then 
consult s system programmer before blindly using instructions such ,is 
COHO or DATAI, 

Appendix I maps LISP 1 a ®1location and use of the accumulators. 
Appendix II lists code which properljy defines the eight macros> as well 
os defining the UUOs CALL , JECALT,, CALT.F, and JCALLP, as. well as defi¬ 
ning the accumulators AjE^Tj and F, This code appears as the file 
LI5P llAt.JtOS Or. the LISP S^STE^£ tape. We suggest tFiat you merge it in 
at the beginning of your program. 

If you art mystified, peruse Al Nemo 116. PDP^ G LlFi? ( IJ5F 1, 6), 
January 1967. 
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2 . LOADING 

Your programs must be Loaded together with LISP system programs 
by STIKKD or 3TIKK, Hero Lb a recipe 2 

1) Have the 6bK system Cape on drive 1, LISP SYSTEM on drive 2 
(&ny) j, and on drive 3 (say), a tape bearing the relocatable binary files 
(e T gf FOQ MR j end MR POO) that you wish to ]o^d t 

2) Load STINKD (say)j and then perform the following iTVCailtat ion ♦ 

3HF00 BAR&LHMR F00Sl,$$ 

The process will torminato with LISP and WXT loaded> with control 
in DET. When you are ready, start LISF as usual with 100$G. LISP will 
begin by allocating storage, then linking your routines into the system. 
If an error occurs in processing a mac to statement of the form m ec erpr , 
LISV will print out the vague c-omrpcnt "LINKAGE ERROR L3UKTKG TO espr", 
After processing all Linkages, LISP goes into its J1sicn loop, 

3, ACEHOWLEDGMEHTS 

Mcuit of the ideas for this hath were suggested by Stxiart Nelson j 
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APPEMBDC 1 

LESP A-SSICHT-nDlT AND NS® OF ACCUlfllUTORB 


0 NIL 
L A M 

2 B" 

3 C" 

4 AM 

j AR2A 

6 T' 

7 TT 
10 

11 S 

12 D 

13 ft 

14 P" 

15 F 

IQ FF 
17 51? 


A Corn head for KIL, 

Value of furtctiona. Arg 1 H Marked from* 
Arg 2 . Marked from. 

A*g 3. Marked iron. 

Arg 4f Marked frccL. 

Atg 5, Marked from. 

Used in calls to T.$lTBRs. Harked from. 
Marked from. 

Hot narked. Clobbered by Garbage Collector, 
Ditto. 

Ditto. 

Hot marked. 

Fdl ac. 

Free storage list at- 
Full word space at. 

Special pdl a c, 
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APPENDIX 11 

CODE FOR DEFIED ENG MACROS 3 GEOS, AND ACS 


ISP MAC, , [SU6R 3 FSUBR 1 LSU&R J MACHO > QfUOTE ± SPECmiE a ,S™iTVPE* t [Ci J l 
DEFINE MAC WAUE/HERE,OLDEND 


,2,3,4,5,6,7] 


HERE=.-J1?GE lYPE-4 1 
EQUALS QUffiND END 
DEFINE END 

IlFEE s j +LENKLIST" 

+ HKKLIST" =$•, -1 

TiflfE -2S.-I-ASCII /gMAHE/ 
EQUALS END OLDEKD 
expunge HERE, OLDEN L) 

EKD 

TEHMIN 

TEEKTR 

TERMJN 


CALL=74000 , s 
JCALL=?5000 ± „ 
CALLF=7600Q, ± 
JCALIJ=77000,» 


.GLOBAL A £ C T F 



